home *** CD-ROM | disk | FTP | other *** search
/ Turnbull China Bikeride / Turnbull China Bikeride - Disc 2.iso / STUTTGART / ETC / CORRECTION < prev    next >
Text File  |  1991-05-22  |  629b  |  25 lines
  1. # correct the names of the directory of a uncompressed untared !x-ed file 
  2. # under unix with gawk
  3. # gawk -f correctnames.gawk _files/nameslist
  4. /^/ {
  5.     if (NF==3)
  6.        {
  7.        aind=split($2,a,".");
  8.        if (aind!=0) 
  9.           {
  10.           string1=a[2];
  11.           for (i=3;i<=aind;i++)
  12.               string1=sprintf("%s/%s",string1,a[i]);
  13.           }
  14.        aind=split($3,a,".");
  15.        if (aind!=0) 
  16.           {
  17.           string2=a[2];
  18.           for (i=3;i<=aind;i++)
  19.              string2=sprintf("%s/%s",string2,a[i]);
  20.           }
  21.        sysstr=sprintf("mv %s %s\n",string1,string2);
  22.        system(sysstr);
  23.        }
  24.     }
  25.